<?php

//require_once 'PEAR.php';
require_once 'oleread.inc';

//define('Spreadsheet_Excel_Reader_HAVE_ICONV', function_exists('iconv'));
//define('Spreadsheet_Excel_Reader_HAVE_MB', function_exists('mb_convert_encoding'));

define('Spreadsheet_Excel_Reader_BIFF8', 0x600);
define('Spreadsheet_Excel_Reader_BIFF7', 0x500);
define('Spreadsheet_Excel_Reader_WorkbookGlobals', 0x5);
define('Spreadsheet_Excel_Reader_Worksheet', 0x10);

define('Spreadsheet_Excel_Reader_Type_BOF', 0x809);
define('Spreadsheet_Excel_Reader_Type_EOF', 0x0a);
define('Spreadsheet_Excel_Reader_Type_BOUNDSHEET', 0x85);
define('Spreadsheet_Excel_Reader_Type_DIMENSION', 0x200);
define('Spreadsheet_Excel_Reader_Type_ROW', 0x208);
define('Spreadsheet_Excel_Reader_Type_DBCELL', 0xd7);
define('Spreadsheet_Excel_Reader_Type_FILEPASS', 0x2f);
define('Spreadsheet_Excel_Reader_Type_NOTE', 0x1c);
define('Spreadsheet_Excel_Reader_Type_TXO', 0x1b6);
define('Spreadsheet_Excel_Reader_Type_RK', 0x7e);
define('Spreadsheet_Excel_Reader_Type_RK2', 0x27e);
define('Spreadsheet_Excel_Reader_Type_MULRK', 0xbd);
define('Spreadsheet_Excel_Reader_Type_MULBLANK', 0xbe);
define('Spreadsheet_Excel_Reader_Type_INDEX', 0x20b);
define('Spreadsheet_Excel_Reader_Type_SST', 0xfc);
define('Spreadsheet_Excel_Reader_Type_EXTSST', 0xff);
define('Spreadsheet_Excel_Reader_Type_CONTINUE', 0x3c);
define('Spreadsheet_Excel_Reader_Type_LABEL', 0x204);
define('Spreadsheet_Excel_Reader_Type_LABELSST', 0xfd);
define('Spreadsheet_Excel_Reader_Type_NUMBER', 0x203);
define('Spreadsheet_Excel_Reader_Type_NAME', 0x18);
define('Spreadsheet_Excel_Reader_Type_ARRAY', 0x221);
define('Spreadsheet_Excel_Reader_Type_STRING', 0x207);
define('Spreadsheet_Excel_Reader_Type_FORMULA', 0x406);
define('Spreadsheet_Excel_Reader_Type_FORMULA2', 0x6);
define('Spreadsheet_Excel_Reader_Type_FORMAT', 0x41e);
define('Spreadsheet_Excel_Reader_Type_XF', 0xe0);
define('Spreadsheet_Excel_Reader_Type_BOOLERR', 0x205);
define('Spreadsheet_Excel_Reader_Type_UNKNOWN', 0xffff);
define('Spreadsheet_Excel_Reader_Type_NINETEENFOUR', 0x22);
define('Spreadsheet_Excel_Reader_Type_MERGEDCELLS', 0xE5);

define('Spreadsheet_Excel_Reader_utcOffsetDays' , 25569);
define('Spreadsheet_Excel_Reader_utcOffsetDays1904', 24107);
define('Spreadsheet_Excel_Reader_msInADay', 24 * 60 * 60);

//define('Spreadsheet_Excel_Reader_DEF_NUM_FORMAT', "%.2f");
define('Spreadsheet_Excel_Reader_DEF_NUM_FORMAT', "%s");

// function file_get_contents for PHP < 4.3.0
// Thanks Marian Steinbach for this function
if (!function_exists('file_get_contents')) {
	function file_get_contents($filename, $use_include_path = 0) {
		$data = '';
		$file = @fopen($filename, "rb", $use_include_path);
		if ($file) {
			while (!feof($file)) $data .= fread($file, 1024);
			fclose($file);
		} else {
			// There was a problem opening the file
			$data = FALSE;
		}
		return $data;
	}
}


//class Spreadsheet_Excel_Reader extends PEAR {
class Spreadsheet_Excel_Reader {

	var $boundsheets = array();
	var $formatRecords = array();
	var $sst = array();
	var $sheets = array();
	var $data;
	var $pos;
	var $_ole;
	var $_defaultEncoding;
	var $_defaultFormat = Spreadsheet_Excel_Reader_DEF_NUM_FORMAT;
	var $_columnsFormat = array();
	var $_rowoffset = 1;
	var $_coloffset = 1;

	var $dateFormats = array (
		0xe => "d/m/Y",
		0xf => "d-M-Y",
		0x10 => "d-M",
		0x11 => "M-Y",
		0x12 => "h:i a",
		0x13 => "h:i:s a",
		0x14 => "H:i",
		0x15 => "H:i:s",
		0x16 => "d/m/Y H:i",
		0x2d => "i:s",
		0x2e => "H:i:s",
		0x2f => "i:s.S");

	var $numberFormats = array(
		0x1 => "%1.0f", // "0"
		0x2 => "%1.2f", // "0.00",
		0x3 => "%1.0f", //",0",
		0x4 => "%1.2f", //",0.00",
		0x5 => "%1.0f", /*"$,0;($,0)",*/
0x6 => '$%1.0f', /*"$,0;($,0)",*/
0x7 => '$%1.2f', //"$,0.00;($,0.00)",
0x8 => '$%1.2f', //"$,0.00;($,0.00)",
0x9 => '%1.0f%%', // "0%"
0xa => '%1.2f%%', // "0.00%"
0xb => '%1.2f', // 0.00E00",
0x25 => '%1.0f', // ",0;(,0)",
0x26 => '%1.0f', //",0;(,0)",
0x27 => '%1.2f', //",0.00;(,0.00)",
0x28 => '%1.2f', //",0.00;(,0.00)",
0x29 => '%1.0f', //",0;(,0)",
0x2a => '$%1.0f', //"$,0;($,0)",
0x2b => '%1.2f', //",0.00;(,0.00)",
0x2c => '$%1.2f', //"$,0.00;($,0.00)",
0x30 => '%1.0f'); //"0.0E0";

function Spreadsheet_Excel_Reader(){
	$this->_ole =& new OLERead();
	$this->setUTFEncoder('iconv');

}

function setOutputEncoding($Encoding){
	$this->_defaultEncoding = $Encoding;
}

/**
 * $encoder = 'iconv' or 'mb'
 * set iconv if you would like use 'iconv' for encode UTF-16LE to your encoding
 * set mb if you would like use 'mb_convert_encoding' for encode UTF-16LE to your encoding
 */
function setUTFEncoder($encoder = 'iconv'){
	$this->_encoderFunction = '';
	if ($encoder == 'iconv'){
		$this->_encoderFunction = function_exists('iconv') ? 'iconv' : '';
	}elseif ($encoder == 'mb') {
		$this->_encoderFunction = function_exists('mb_convert_encoding') ? 'mb_convert_encoding' : '';
	}
}

function setRowColOffset($iOffset){
	$this->_rowoffset = $iOffset;
	$this->_coloffset = $iOffset;
}

function setDefaultFormat($sFormat){
	$this->_defaultFormat = $sFormat;
}

function setColumnFormat($column, $sFormat){
	$this->_columnsFormat[$column] = $sFormat;
}


function read($sFileName) {
	$errlevel = error_reporting();
	error_reporting($errlevel ^ E_NOTICE);
	$res = $this->_ole->read($sFileName);

	// oops, something goes wrong (Darko Miljanovic)
	if($res === false) {
		// check error code
		if($this->_ole->error == 1) {
			// bad file
			die('The filename ' . $sFileName . ' is not readable');
		}
		// check other error codes here (eg bad fileformat, etc...)
	}

	$this->data = $this->_ole->getWorkBook();


 /*
 $res = $this->_ole->read($sFileName);

 if ($this->isError($res)) {
 // var_dump($res);
 return $this->raiseError($res);
 }

 $total = $this->_ole->ppsTotal();
 for ($i = 0; $i < $total; $i++) {
 if ($this->_ole->isFile($i)) {
 $type = unpack("v", $this->_ole->getData($i, 0, 2));
 if ($type[''] == 0x0809) { // check if it's a BIFF stream
 $this->_index = $i;
 $this->data = $this->_ole->getData($i, 0, $this->_ole->getDataLength($i));
 break;
 }
 }
 }

 if ($this->_index === null) {
 return $this->raiseError("$file doesn't seem to be an Excel file");
 }

  */

	//var_dump($this->data);
	//echo "data =".$this->data;
	$this->pos = 0;
	//$this->readRecords();
	$this->_parse();
	error_reporting($errlevel);

}

function _parse(){
	$pos = 0;

	$code = ord($this->data[$pos]) | ord($this->data[$pos+1])<<8;
	$length = ord($this->data[$pos+2]) | ord($this->data[$pos+3])<<8;

	$version = ord($this->data[$pos + 4]) | ord($this->data[$pos + 5])<<8;
	$substreamType = ord($this->data[$pos + 6]) | ord($this->data[$pos + 7])<<8;
	//echo "Start parse code=".base_convert($code,10,16)." version=".base_convert($version,10,16)." substreamType=".base_convert($substreamType,10,16).""."\n";

	if (($version != Spreadsheet_Excel_Reader_BIFF8) && ($version != Spreadsheet_Excel_Reader_BIFF7)) {
		return false;
	}

	if ($substreamType != Spreadsheet_Excel_Reader_WorkbookGlobals){
		return false;
	}

	//print_r($rec);
	$pos += $length + 4;

	$code = ord($this->data[$pos]) | ord($this->data[$pos+1])<<8;
	$length = ord($this->data[$pos+2]) | ord($this->data[$pos+3])<<8;

	while ($code != Spreadsheet_Excel_Reader_Type_EOF){
		switch ($code) {
		case Spreadsheet_Excel_Reader_Type_SST:
			//echo "Type_SST\n";
			$spos = $pos + 4;
			$limitpos = $spos + $length;
			$uniqueStrings = $this->_GetInt4d($this->data, $spos+4);
			$spos += 8;
			for ($i = 0; $i < $uniqueStrings; $i++) {
				// Read in the number of characters
				if ($spos == $limitpos) {
					$opcode = ord($this->data[$spos]) | ord($this->data[$spos+1])<<8;
					$conlength = ord($this->data[$spos+2]) | ord($this->data[$spos+3])<<8;
					if ($opcode != 0x3c) {
						return -1;
					}
					$spos += 4;
					$limitpos = $spos + $conlength;
				}
				$numChars = ord($this->data[$spos]) | (ord($this->data[$spos+1]) << 8);
				//echo "i = $i pos = $pos numChars = $numChars ";
				$spos += 2;
				$optionFlags = ord($this->data[$spos]);
				$spos++;
				$asciiEncoding = (($optionFlags & 0x01) == 0) ;
				$extendedString = ( ($optionFlags & 0x04) != 0);

				// See if string contains formatting information
				$richString = ( ($optionFlags & 0x08) != 0);

				if ($richString) {
					// Read in the crun
					$formattingRuns = ord($this->data[$spos]) | (ord($this->data[$spos+1]) << 8);
					$spos += 2;
				}

				if ($extendedString) {
					// Read in cchExtRst
					$extendedRunLength = $this->_GetInt4d($this->data, $spos);
					$spos += 4;
				}

				$len = ($asciiEncoding)? $numChars : $numChars*2;
				if ($spos + $len < $limitpos) {
					$retstr = substr($this->data, $spos, $len);
					$spos += $len;
				}else{
					// found countinue
					$retstr = substr($this->data, $spos, $limitpos - $spos);
					$bytesRead = $limitpos - $spos;
					$charsLeft = $numChars - (($asciiEncoding) ? $bytesRead : ($bytesRead / 2));
					$spos = $limitpos;

					while ($charsLeft > 0){
						$opcode = ord($this->data[$spos]) | ord($this->data[$spos+1])<<8;
						$conlength = ord($this->data[$spos+2]) | ord($this->data[$spos+3])<<8;
						if ($opcode != 0x3c) {
							return -1;
						}
						$spos += 4;
						$limitpos = $spos + $conlength;
						$option = ord($this->data[$spos]);
						$spos += 1;
						if ($asciiEncoding && ($option == 0)) {
							$len = min($charsLeft, $limitpos - $spos); // min($charsLeft, $conlength);
							$retstr .= substr($this->data, $spos, $len);
							$charsLeft -= $len;
							$asciiEncoding = true;
						}elseif (!$asciiEncoding && ($option != 0)){
							$len = min($charsLeft * 2, $limitpos - $spos); // min($charsLeft, $conlength);
							$retstr .= substr($this->data, $spos, $len);
							$charsLeft -= $len/2;
							$asciiEncoding = false;
						}elseif (!$asciiEncoding && ($option == 0)) {
							// Bummer - the string starts off as Unicode, but after the
							// continuation it is in straightforward ASCII encoding
							$len = min($charsLeft, $limitpos - $spos); // min($charsLeft, $conlength);
							for ($j = 0; $j < $len; $j++) {
								$retstr .= $this->data[$spos + $j].chr(0);
							}
							$charsLeft -= $len;
							$asciiEncoding = false;
						}else{
							$newstr = '';
							for ($j = 0; $j < strlen($retstr); $j++) {
								$newstr = $retstr[$j].chr(0);
							}
							$retstr = $newstr;
							$len = min($charsLeft * 2, $limitpos - $spos); // min($charsLeft, $conlength);
							$retstr .= substr($this->data, $spos, $len);
							$charsLeft -= $len/2;
							$asciiEncoding = false;
							//echo "Izavrat\n";
						}
						$spos += $len;

					}
				}
				$retstr = ($asciiEncoding) ? $retstr : $this->_encodeUTF16($retstr);
				// echo "Str $i = $retstr\n";
				if ($richString){
					$spos += 4 * $formattingRuns;
				}

				// For extended strings, skip over the extended string data
				if ($extendedString) {
					$spos += $extendedRunLength;
				}
				//if ($retstr == 'Derby'){
				// echo "bb\n";
				//}
				$this->sst[]=$retstr;
			}
 /*$continueRecords = array();
 while ($this->getNextCode() == Type_CONTINUE) {
 $continueRecords[] = &$this->nextRecord();
 }
 //echo " 1 Type_SST\n";
 $this->shareStrings = new SSTRecord($r, $continueRecords);
 //print_r($this->shareStrings->strings);
  */
			// echo 'SST read: '.($time_end-$time_start)."\n";
			break;

		case Spreadsheet_Excel_Reader_Type_FILEPASS:
			return false;
			break;
		case Spreadsheet_Excel_Reader_Type_NAME:
			//echo "Type_NAME\n";
			break;
		case Spreadsheet_Excel_Reader_Type_FORMAT:
			$indexCode = ord($this->data[$pos+4]) | ord($this->data[$pos+5]) << 8;

			if ($version == Spreadsheet_Excel_Reader_BIFF8) {
				$numchars = ord($this->data[$pos+6]) | ord($this->data[$pos+7]) << 8;
				if (ord($this->data[$pos+8]) == 0){
					$formatString = substr($this->data, $pos+9, $numchars);
				} else {
					$formatString = substr($this->data, $pos+9, $numchars*2);
				}
			} else {
				$numchars = ord($this->data[$pos+6]);
				$formatString = substr($this->data, $pos+7, $numchars*2);
			}

			$this->formatRecords[$indexCode] = $formatString;
			// echo "Type.FORMAT\n";
			break;
		case Spreadsheet_Excel_Reader_Type_XF:
			//global $dateFormats, $numberFormats;
			$indexCode = ord($this->data[$pos+6]) | ord($this->data[$pos+7]) << 8;
			//echo "\nType.XF ".count($this->formatRecords['xfrecords'])." $indexCode ";
			if (array_key_exists($indexCode, $this->dateFormats)) {
				//echo "isdate ".$dateFormats[$indexCode];
				$this->formatRecords['xfrecords'][] = array(
					'type' => 'date',
					'format' => $this->dateFormats[$indexCode]
				);
			}elseif (array_key_exists($indexCode, $this->numberFormats)) {
				//echo "isnumber ".$this->numberFormats[$indexCode];
				$this->formatRecords['xfrecords'][] = array(
					'type' => 'number',
					'format' => $this->numberFormats[$indexCode]
				);
			}else{
				$isdate = FALSE;
				if ($indexCode > 0){
					$formatstr="";
					if (isset($this->formatRecords[$indexCode]))
						$formatstr = $this->formatRecords[$indexCode];
					//echo '.other.';
					//echo "\ndate-time=$formatstr=\n";
					if ($formatstr)
						if (preg_match("/[^hmsday\/\-:\s]/i", $formatstr) == 0) { // found day and time format
							$isdate = TRUE;
							$formatstr = str_replace('mm', 'i', $formatstr);
							$formatstr = str_replace('h', 'H', $formatstr);
							//echo "\ndate-time $formatstr \n";
						}
				}

				if ($isdate){
					$this->formatRecords['xfrecords'][] = array(
						'type' => 'date',
						'format' => $formatstr,
					);
				}else{
					$this->formatRecords['xfrecords'][] = array(
						'type' => 'other',
						'format' => '',
						'code' => $indexCode
					);
				}
			}
			//echo "\n";
			break;
		case Spreadsheet_Excel_Reader_Type_NINETEENFOUR:
			//echo "Type.NINETEENFOUR\n";
			$this->nineteenFour = (ord($this->data[$pos+4]) == 1);
			break;
		case Spreadsheet_Excel_Reader_Type_BOUNDSHEET:
			//echo "Type.BOUNDSHEET\n";
			$rec_offset = $this->_GetInt4d($this->data, $pos+4);
			$rec_typeFlag = ord($this->data[$pos+8]);
			$rec_visibilityFlag = ord($this->data[$pos+9]);
			$rec_length = ord($this->data[$pos+10]);

			if ($version == Spreadsheet_Excel_Reader_BIFF8){
				$chartype = ord($this->data[$pos+11]);
				if ($chartype == 0){
					$rec_name = substr($this->data, $pos+12, $rec_length);
				} else {
					$rec_name = $this->_encodeUTF16(substr($this->data, $pos+12, $rec_length*2));
				}
			}elseif ($version == Spreadsheet_Excel_Reader_BIFF7){
				$rec_name = substr($this->data, $pos+11, $rec_length);
			}
			$this->boundsheets[] = array('name'=>$rec_name,
				'offset'=>$rec_offset);

			break;

		}

		//echo "Code = ".base_convert($r['code'],10,16)."\n";
		$pos += $length + 4;
		$code = ord($this->data[$pos]) | ord($this->data[$pos+1])<<8;
		$length = ord($this->data[$pos+2]) | ord($this->data[$pos+3])<<8;

		//$r = &$this->nextRecord();
		//echo "1 Code = ".base_convert($r['code'],10,16)."\n";
	}

	foreach ($this->boundsheets as $key=>$val){
		$this->sn = $key;
		$this->_parsesheet($val['offset']);
	}
	return true;

}

function _parsesheet($spos){
	$cont = true;
	// read BOF
	$code = ord($this->data[$spos]) | ord($this->data[$spos+1])<<8;
	$length = ord($this->data[$spos+2]) | ord($this->data[$spos+3])<<8;

	$version = ord($this->data[$spos + 4]) | ord($this->data[$spos + 5])<<8;
	$substreamType = ord($this->data[$spos + 6]) | ord($this->data[$spos + 7])<<8;

	if (($version != Spreadsheet_Excel_Reader_BIFF8) && ($version != Spreadsheet_Excel_Reader_BIFF7)) {
		return -1;
	}

	if ($substreamType != Spreadsheet_Excel_Reader_Worksheet){
		return -2;
	}
	//echo "Start parse code=".base_convert($code,10,16)." version=".base_convert($version,10,16)." substreamType=".base_convert($substreamType,10,16).""."\n";
	$spos += $length + 4;
	//var_dump($this->formatRecords);
	//echo "code $code $length";
	while($cont) {
		//echo "mem= ".memory_get_usage()."\n";
		// $r = &$this->file->nextRecord();
		$lowcode = ord($this->data[$spos]);
		if ($lowcode == Spreadsheet_Excel_Reader_Type_EOF) break;
		$code = $lowcode | ord($this->data[$spos+1])<<8;
		$length = ord($this->data[$spos+2]) | ord($this->data[$spos+3])<<8;
		$spos += 4;
		$this->sheets[$this->sn]['maxrow'] = $this->_rowoffset - 1;
		$this->sheets[$this->sn]['maxcol'] = $this->_coloffset - 1;
		//echo "Code=".base_convert($code,10,16)." $code\n";
		unset($this->rectype);
		$this->multiplier = 1; // need for format with %
		switch ($code) {
		case Spreadsheet_Excel_Reader_Type_DIMENSION:
			//echo 'Type_DIMENSION ';
			if (!isset($this->numRows)) {
				if (($length == 10) || ($version == Spreadsheet_Excel_Reader_BIFF7)){
					$this->sheets[$this->sn]['numRows'] = ord($this->data[$spos+2]) | ord($this->data[$spos+3]) << 8;
					$this->sheets[$this->sn]['numCols'] = ord($this->data[$spos+6]) | ord($this->data[$spos+7]) << 8;
				} else {
					$this->sheets[$this->sn]['numRows'] = ord($this->data[$spos+4]) | ord($this->data[$spos+5]) << 8;
					$this->sheets[$this->sn]['numCols'] = ord($this->data[$spos+10]) | ord($this->data[$spos+11]) << 8;
				}
			}
			//echo 'numRows '.$this->numRows.' '.$this->numCols."\n";
			break;
		case Spreadsheet_Excel_Reader_Type_MERGEDCELLS:
			$cellRanges = ord($this->data[$spos]) | ord($this->data[$spos+1])<<8;
			for ($i = 0; $i < $cellRanges; $i++) {
				$fr = ord($this->data[$spos + 8*$i + 2]) | ord($this->data[$spos + 8*$i + 3])<<8;
				$lr = ord($this->data[$spos + 8*$i + 4]) | ord($this->data[$spos + 8*$i + 5])<<8;
				$fc = ord($this->data[$spos + 8*$i + 6]) | ord($this->data[$spos + 8*$i + 7])<<8;
				$lc = ord($this->data[$spos + 8*$i + 8]) | ord($this->data[$spos + 8*$i + 9])<<8;
				//$this->sheets[$this->sn]['mergedCells'][] = array($fr + 1, $fc + 1, $lr + 1, $lc + 1);
				if ($lr - $fr > 0) {
					$this->sheets[$this->sn]['cellsInfo'][$fr+1][$fc+1]['rowspan'] = $lr - $fr + 1;
				}
				if ($lc - $fc > 0) {
					$this->sheets[$this->sn]['cellsInfo'][$fr+1][$fc+1]['colspan'] = $lc - $fc + 1;
				}
			}
			//echo "Merged Cells $cellRanges $lr $fr $lc $fc\n";
			break;
		case Spreadsheet_Excel_Reader_Type_RK:
		case Spreadsheet_Excel_Reader_Type_RK2:
			//echo 'Spreadsheet_Excel_Reader_Type_RK'."\n";
			$row = ord($this->data[$spos]) | ord($this->data[$spos+1])<<8;
			$column = ord($this->data[$spos+2]) | ord($this->data[$spos+3])<<8;
			$rknum = $this->_GetInt4d($this->data, $spos + 6);
			$numValue = $this->_GetIEEE754($rknum);
			//echo $numValue." ";
			if ($this->isDate($spos)) {
				list($string, $raw) = $this->createDate($numValue);
			}else{
				$raw = $numValue;
				if (isset($this->_columnsFormat[$column + 1])){
					$this->curformat = $this->_columnsFormat[$column + 1];
				}
				$string = sprintf($this->curformat, $numValue * $this->multiplier);
				//$this->addcell(RKRecord($r));
			}
			$this->addcell($row, $column, $string, $raw);
			//echo "Type_RK $row $column $string $raw {$this->curformat}\n";
			break;
		case Spreadsheet_Excel_Reader_Type_LABELSST:
			$row = ord($this->data[$spos]) | ord($this->data[$spos+1])<<8;
			$column = ord($this->data[$spos+2]) | ord($this->data[$spos+3])<<8;
			$xfindex = ord($this->data[$spos+4]) | ord($this->data[$spos+5])<<8;
			$index = $this->_GetInt4d($this->data, $spos + 6);
			//var_dump($this->sst);
			$this->addcell($row, $column, $this->sst[$index]);
			//echo "LabelSST $row $column $string\n";
			break;
		case Spreadsheet_Excel_Reader_Type_MULRK:
			$row = ord($this->data[$spos]) | ord($this->data[$spos+1])<<8;
			$colFirst = ord($this->data[$spos+2]) | ord($this->data[$spos+3])<<8;
			$colLast = ord($this->data[$spos + $length - 2]) | ord($this->data[$spos + $length - 1])<<8;
			$columns = $colLast - $colFirst + 1;
			$tmppos = $spos+4;
			for ($i = 0; $i < $columns; $i++) {
				$numValue = $this->_GetIEEE754($this->_GetInt4d($this->data, $tmppos + 2));
				if ($this->isDate($tmppos-4)) {
					list($string, $raw) = $this->createDate($numValue);
				}else{
					$raw = $numValue;
					if (isset($this->_columnsFormat[$colFirst + $i + 1])){
						$this->curformat = $this->_columnsFormat[$colFirst + $i + 1];
					}
					$string = sprintf($this->curformat, $numValue * $this->multiplier);
				}
				//$rec['rknumbers'][$i]['xfindex'] = ord($rec['data'][$pos]) | ord($rec['data'][$pos+1]) << 8;
				$tmppos += 6;
				$this->addcell($row, $colFirst + $i, $string, $raw);
				//echo "MULRK $row ".($colFirst + $i)." $string\n";
			}
			//MulRKRecord($r);
			// Get the individual cell records from the multiple record
			//$num = ;

			break;
		case Spreadsheet_Excel_Reader_Type_NUMBER:
			$row = ord($this->data[$spos]) | ord($this->data[$spos+1])<<8;
			$column = ord($this->data[$spos+2]) | ord($this->data[$spos+3])<<8;
			$tmp = unpack("ddouble", substr($this->data, $spos + 6, 8)); // It machine machine dependent
			if ($this->isDate($spos)) {
				list($string, $raw) = $this->createDate($tmp['double']);
				// $this->addcell(DateRecord($r, 1));
			}else{
				//$raw = $tmp[''];
				if (isset($this->_columnsFormat[$column + 1])){
					$this->curformat = $this->_columnsFormat[$column + 1];
				}
				$raw = $this->createNumber($spos);
				$string = sprintf($this->curformat, $raw * $this->multiplier);

				// $this->addcell(NumberRecord($r));
			}
			$this->addcell($row, $column, $string, $raw);
			//echo "Number $row $column $string\n";
			break;
		case Spreadsheet_Excel_Reader_Type_FORMULA:
		case Spreadsheet_Excel_Reader_Type_FORMULA2:
			$row = ord($this->data[$spos]) | ord($this->data[$spos+1])<<8;
			$column = ord($this->data[$spos+2]) | ord($this->data[$spos+3])<<8;
			if ((ord($this->data[$spos+6])==0) && (ord($this->data[$spos+12])==255) && (ord($this->data[$spos+13])==255)) {
				//String formula. Result follows in a STRING record
				//echo "FORMULA $row $column Formula with a string<br>\n";
			} elseif ((ord($this->data[$spos+6])==1) && (ord($this->data[$spos+12])==255) && (ord($this->data[$spos+13])==255)) {
				//Boolean formula. Result is in +2; 0=false,1=true
			} elseif ((ord($this->data[$spos+6])==2) && (ord($this->data[$spos+12])==255) && (ord($this->data[$spos+13])==255)) {
				//Error formula. Error code is in +2;
			} elseif ((ord($this->data[$spos+6])==3) && (ord($this->data[$spos+12])==255) && (ord($this->data[$spos+13])==255)) {
				//Formula result is a null string.
			} else {
				// result is a number, so first 14 bytes are just like a _NUMBER record
				$tmp = unpack("ddouble", substr($this->data, $spos + 6, 8)); // It machine machine dependent
				if ($this->isDate($spos)) {
					list($string, $raw) = $this->createDate($tmp['double']);
					// $this->addcell(DateRecord($r, 1));
				}else{
					//$raw = $tmp[''];
					if (isset($this->_columnsFormat[$column + 1])){
						$this->curformat = $this->_columnsFormat[$column + 1];
					}
					$raw = $this->createNumber($spos);
					$string = sprintf($this->curformat, $raw * $this->multiplier);

					// $this->addcell(NumberRecord($r));
				}
				$this->addcell($row, $column, $string, $raw);
				//echo "Number $row $column $string\n";
			}
			break;
		case Spreadsheet_Excel_Reader_Type_BOOLERR:
			$row = ord($this->data[$spos]) | ord($this->data[$spos+1])<<8;
			$column = ord($this->data[$spos+2]) | ord($this->data[$spos+3])<<8;
			$string = ord($this->data[$spos+6]);
			$this->addcell($row, $column, $string);
			//echo 'Type_BOOLERR '."\n";
			break;
		case Spreadsheet_Excel_Reader_Type_ROW:
		case Spreadsheet_Excel_Reader_Type_DBCELL:
		case Spreadsheet_Excel_Reader_Type_MULBLANK:
			break;
		case Spreadsheet_Excel_Reader_Type_LABEL:
			$row = ord($this->data[$spos]) | ord($this->data[$spos+1])<<8;
			$column = ord($this->data[$spos+2]) | ord($this->data[$spos+3])<<8;
			$this->addcell($row, $column, substr($this->data, $spos + 8, ord($this->data[$spos + 6]) | ord($this->data[$spos + 7])<<8));

			// $this->addcell(LabelRecord($r));
			break;

		case Spreadsheet_Excel_Reader_Type_EOF:
			$cont = false;
			break;
		default:
			//echo ' unknown :'.base_convert($r['code'],10,16)."\n";
			break;

		}
		$spos += $length;
	}

	if (!isset($this->sheets[$this->sn]['numRows']))
		$this->sheets[$this->sn]['numRows'] = $this->sheets[$this->sn]['maxrow'];
	if (!isset($this->sheets[$this->sn]['numCols']))
		$this->sheets[$this->sn]['numCols'] = $this->sheets[$this->sn]['maxcol'];

}

function isDate($spos){
	//$xfindex = GetInt2d(, 4);
	$xfindex = ord($this->data[$spos+4]) | ord($this->data[$spos+5]) << 8;
	//echo 'check is date '.$xfindex.' '.$this->formatRecords['xfrecords'][$xfindex]['type']."\n";
	//var_dump($this->formatRecords['xfrecords'][$xfindex]);
	if ($this->formatRecords['xfrecords'][$xfindex]['type'] == 'date') {
		$this->curformat = $this->formatRecords['xfrecords'][$xfindex]['format'];
		$this->rectype = 'date';
		return true;
	} else {
		if ($this->formatRecords['xfrecords'][$xfindex]['type'] == 'number') {
			$this->curformat = $this->formatRecords['xfrecords'][$xfindex]['format'];
			$this->rectype = 'number';
			if (($xfindex == 0x9) || ($xfindex == 0xa)){
				$this->multiplier = 100;
			}
		}else{
			$this->curformat = $this->_defaultFormat;
			$this->rectype = 'unknown';
		}
		return false;
	}
}

function createDate($numValue){
	if ($numValue > 1){
		$utcDays = $numValue - ($this->nineteenFour ? Spreadsheet_Excel_Reader_utcOffsetDays1904 : Spreadsheet_Excel_Reader_utcOffsetDays);
		$utcValue = round($utcDays * Spreadsheet_Excel_Reader_msInADay);
		$string = date ($this->curformat, $utcValue);
		$raw = $utcValue;
	}else{
		$raw = $numValue;
		$hours = floor($numValue * 24);
		$mins = floor($numValue * 24 * 60) - $hours * 60;
		$secs = floor($numValue * Spreadsheet_Excel_Reader_msInADay) - $hours * 60 * 60 - $mins * 60;
		$string = date ($this->curformat, mktime($hours, $mins, $secs));
	}
	return array($string, $raw);
}

function createNumber($spos){
	$rknumhigh = $this->_GetInt4d($this->data, $spos + 10);
	$rknumlow = $this->_GetInt4d($this->data, $spos + 6);
	//for ($i=0; $i<8; $i++) { echo ord($this->data[$i+$spos+6]) . " "; } echo "<br>";
	$sign = ($rknumhigh & 0x80000000) >> 31;
	$exp = ($rknumhigh & 0x7ff00000) >> 20;
	$mantissa = (0x100000 | ($rknumhigh & 0x000fffff));
	$mantissalow1 = ($rknumlow & 0x80000000) >> 31;
	$mantissalow2 = ($rknumlow & 0x7fffffff);
	$value = $mantissa / pow( 2 , (20- ($exp - 1023)));
	if ($mantissalow1 != 0) $value += 1 / pow (2 , (21 - ($exp - 1023)));
	$value += $mantissalow2 / pow (2 , (52 - ($exp - 1023)));
	//echo "Sign = $sign, Exp = $exp, mantissahighx = $mantissa, mantissalow1 = $mantissalow1, mantissalow2 = $mantissalow2<br>\n";
	if ($sign) {$value = -1 * $value;}
	return $value;
}

function addcell($row, $col, $string, $raw = ''){
	//echo "ADD cel $row-$col $string\n";
	$this->sheets[$this->sn]['maxrow'] = max($this->sheets[$this->sn]['maxrow'], $row + $this->_rowoffset);
	$this->sheets[$this->sn]['maxcol'] = max($this->sheets[$this->sn]['maxcol'], $col + $this->_coloffset);
	$this->sheets[$this->sn]['cells'][$row + $this->_rowoffset][$col + $this->_coloffset] = $string;
	if ($raw)
		$this->sheets[$this->sn]['cellsInfo'][$row + $this->_rowoffset][$col + $this->_coloffset]['raw'] = $raw;
	if (isset($this->rectype))
		$this->sheets[$this->sn]['cellsInfo'][$row + $this->_rowoffset][$col + $this->_coloffset]['type'] = $this->rectype;

}


function _GetIEEE754($rknum){
	if (($rknum & 0x02) != 0) {
		$value = $rknum >> 2;
	} else {
		//mmp
		// first comment out the previously existing 7 lines of code here
		// $tmp = unpack("d", pack("VV", 0, ($rknum & 0xfffffffc)));
		// //$value = $tmp[''];
		// if (array_key_exists(1, $tmp)) {
		// $value = $tmp[1];
		// } else {
		// $value = $tmp[''];
		// }
		// I got my info on IEEE754 encoding from
		// http://research.microsoft.com/~hollasch/cgindex/coding/ieeefloat.html
		// The RK format calls for using only the most significant 30 bits of the
		// 64 bit floating point value. The other 34 bits are assumed to be 0
		// So, we use the upper 30 bits of $rknum as follows...
		$sign = ($rknum & 0x80000000) >> 31;
		$exp = ($rknum & 0x7ff00000) >> 20;
		$mantissa = (0x100000 | ($rknum & 0x000ffffc));
		$value = $mantissa / pow( 2 , (20- ($exp - 1023)));
		if ($sign) {$value = -1 * $value;}
		//end of changes by mmp

	}

	if (($rknum & 0x01) != 0) {
		$value /= 100;
	}
	return $value;
}

function _encodeUTF16($string){
	$result = $string;
	if ($this->_defaultEncoding){
		switch ($this->_encoderFunction){
		case 'iconv' : $result = iconv('UTF-16LE', $this->_defaultEncoding, $string);
			break;
		case 'mb_convert_encoding' : $result = mb_convert_encoding($string, $this->_defaultEncoding, 'UTF-16LE' );
			break;
		}
	}
	return $result;
}

function _GetInt4d($data, $pos) {
	return ord($data[$pos]) | (ord($data[$pos+1]) << 8) | (ord($data[$pos+2]) << 16) | (ord($data[$pos+3]) << 24);
}


}


?>